home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
prolog
/
ai.prl
/
opnprlg1.hqx
/
Open Prolog
/
Open Prolog.rsrc
/
CODE_19_shutdown.txt
< prev
next >
Wrap
Text File
|
1993-04-15
|
3KB
|
56 lines
# near model CODE resource
# entry label at 0x0000
export_395:
entry:
00000000 082D 0000 E6CC btst.b [A5 - 0x1934], 0x0
00000006 660C bne +0xE /* 00000014 */
00000008 3F3C 0012 move.w -[A7], 0x12
0000000C 4EAD 04FA jsr [A5 + 0x4FA]
label00000010:
00000010 4EED 053A jmp [A5 + 0x53A]
label00000014:
00000014 2F3C 0000 000C move.l -[A7], 0xC
0000001A 42A7 clr.l -[A7]
0000001C 42A7 clr.l -[A7]
0000001E 3F3C 000F move.w -[A7], 0xF
00000022 4EAD 09FA jsr [A5 + 0x9FA]
00000026 201F move.l D0, [A7]+
00000028 0C80 0000 0000 cmpi.l D0, 0x0
0000002E 67E0 beq -0x1E /* 00000010 */
00000030 7007 moveq.l D0, 0x07
00000032 4E75 rts
00000034 4E5E unlink A6
00000036 4E75 rts
00000038 8B42 2573 pack D5, D2, 0x2573
0000003C 6875 bvc +0x77 /* 000000B3 */
0000003E 7464 moveq.l D2, 0x64
00000040 6F77 ble +0x79 /* 000000B9 */
00000042 6E20 bgt +0x22 /* 00000064 */
00000044 0000 082D ori.b D0, 0x2D /* '-' */
export_396: // at 00000046 (misaligned)
00000048 0000 E6CC ori.b D0, 0xCC
0000004C 660C bne +0xE /* 0000005A */
0000004E 3F3C 0013 move.w -[A7], 0x13
00000052 4EAD 04FA jsr [A5 + 0x4FA]
label00000056:
00000056 4EED 053A jmp [A5 + 0x53A]
label0000005A:
0000005A 2F3C 0000 000C move.l -[A7], 0xC
00000060 42A7 clr.l -[A7]
00000062 42A7 clr.l -[A7]
label00000064:
00000064 3F3C 0010 move.w -[A7], 0x10
00000068 4EAD 09FA jsr [A5 + 0x9FA]
0000006C 201F move.l D0, [A7]+
0000006E 0C80 0000 0000 cmpi.l D0, 0x0
00000074 67E0 beq -0x1E /* 00000056 */
00000076 7008 moveq.l D0, 0x08
00000078 4E75 rts
0000007A 4E5E unlink A6
0000007C 4E75 rts
0000007E 8942 2572 pack D4, D2, 0x2572
00000082 6573 bcs +0x75 /* 000000F7 */
00000084 7461 moveq.l D2, 0x61
00000086 7274 moveq.l D1, 0x74
00000088 0000 .incomplete